home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 2002 #11
/
Amiga Plus CD - 2002 - No. 11.iso
/
Tools
/
Development
/
PowerD
/
powerd
/
source
/
lib
/
powerd_lib.lha
/
PowerD_PPC
/
OpenW.d
< prev
next >
Wrap
Text File
|
2001-04-24
|
443b
|
23 lines
OPT PPC,NOEXE,NOSTD
MODULE 'intuition/intuition'
PROC OpenW(x,y,wi,he,idcmp,flags,title,screen,stype,gadgets,tags)(L)
DEF window:PTR TO Window
window:=OpenWindowTags(NIL,
WA_Left,x,
WA_Top,x,
WA_Width,wi,
WA_Height,he,
WA_IDCMP,idcmp,
WA_Flags,flags,
WA_Title,title,
WA_CustomScreen,screen,
WA_Gadgets,gadgets,
TAG_MORE,tags,
TAG_END)
IF window THEN stdrast:=window.RPort
ENDPROC window
DEF stdrast,stdrast_coloura